hook::add message bot:ha 50
set opt(?) 1
proc bot:ha {from type body} {

if {[string length body]<3} { return }
global allhelp opt
	if {$opt(?)>0} {
		set a bot:ha
		#::debug $a "? option" "1"
		if {[string range $body 0 0]=="?"} {
			::debug $a commmand help_?
			set text [string trimleft [string range $body 1 [string length $body]]]
			if {[info exists allhelp($text)]} {
				set help $allhelp($text)
				if {$type=="chat"} {
					pm "$from" "$help"
					return stop
				} else {
					gm "$from" "$help"
					return stop
				}
			}
		}
	}
}